home *** CD-ROM | disk | FTP | other *** search
-
-
-
- CCCCSSSSRRRROOOOTTTT((((3333FFFF)))) CCCCSSSSRRRROOOOTTTT((((3333FFFF))))
-
-
-
- NNNNAAAAMMMMEEEE
- CSROT - CSROT applies the complex Givens rotation
-
- (X) ( C S)(X)
- (Y) = (-S C)(Y)
-
- N times where for I = 0,...,N-1
-
- X = CX(1+I*INCX)
- Y = CY(1+I*INCY)
-
-
- SSSSYYYYNNNNOOOOPPPPSSSSYYYYSSSS
- SUBROUTINE CSROT(N,CX,INCX,CY,INCY,C,S)
-
- DDDDEEEESSSSCCCCRRRRIIIIPPPPTTTTIIIIOOOONNNN
- Argument Description
-
- NNNN (integer) number of elements in each vector
-
- CCCCXXXX (complex array) beginning of one vector
-
- IIIINNNNCCCCXXXX (integer) memory spacing of successive elements
- of vector CX
-
- CCCCYYYY (complex array) beginning of the other vector
-
- IIIINNNNCCCCYYYY (integer) memory spacing of successive elements
- of vector CY
-
- CCCC (real) cosine term of the rotation
-
- SSSS (real) sine term of the rotation.
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- PPPPaaaaggggeeee 1111
-
-
-
-